home *** CD-ROM | disk | FTP | other *** search
/ CD Charme 1 / CD Charme 01.iso / mac / hybride / GLOWING / HOLO / CHOOSE.DIR / 00130_Script_130 < prev   
Text File  |  1994-12-08  |  1KB  |  40 lines
  1. on exitFrame
  2.   global clipCount
  3.   set the puppet of sprite 20 to TRUE
  4.   
  5.   put the castnum of sprite 20 into num
  6.   put the name of cast num into QTname
  7.   if QTname contains ".MOV" then
  8.     exit
  9.   else
  10.     --beep
  11.     if clipcount = 1 then
  12.       -- Are you sure?
  13.       set the castNum of sprite 20 to the number of cast "Q2NO.MOV"
  14.     else if clipcount = 2 then
  15.       -- Find a man... maybe I did?
  16.       set the castNum of sprite 20 to the number of cast "Q3NO.MOV"
  17.     else if clipcount = 3 then
  18.       -- jacket off
  19.       set the castNum of sprite 20 to the number of cast "Q4NO.MOV"
  20.     else if clipcount = 4 then
  21.       -- DO YOU MIND, if I take my shoes off?
  22.       set the castNum of sprite 20 to the number of cast "Q5YES.MOV"
  23.     else if clipcount = 5 then
  24.       -- OK if I take my skirt off?
  25.       set the castNum of sprite 20 to the number of cast "Q6NO.MOV"
  26.     else if clipcount = 6 then
  27.       -- blouse off
  28.       set the castNum of sprite 20 to the number of cast "Q7NO.MOV"
  29.     else if clipcount = 7 then
  30.       -- stockings off
  31.       set the castNum of sprite 20 to the number of cast "Q8NO.MOV"
  32.     else if clipcount = 8 then
  33.       nothing
  34.     else
  35.       go to "ChooseMovie"
  36.     end if  
  37.   end if 
  38.   spriteBox 20, 160, 130, 480, 370
  39.   upDateStage
  40. end